Croma{sem pacote}					Documentao do R

Descrio

	Calcula concentrao de compostos a partir de dados de rea do pico para cromatografia, ou abosrbncia para espectrofotmetro, com base em uma curva padro.

Uso

	Croma(dados, padrao)

Argumentos

	dados	um objeto do R, por exemplo vetor, matriz ou data frame com cada composto em uma coluna e com as reas dos picos observadas nas linhas. O nome de cada composto deve vir no cabealho de cada coluna.
	padrao	um objeto do R, por exemplo matriz ou data frame com as concentraes das solues padro na primeira coluna, e as reas dos picos correspondentes a cada composto nas colunas seguintes

Detalhes

	O objeto padrao deve ser uma matriz ou um data frame com pelo menos duas colunas. A primeira coluna sempre tem as concentraes dos compostos das amostras padro e as seguintes tem os valores lidos de reas de pico ou de valores de absorbncia.

	O objeto dados possui apenas as colunas com as leituras de rea de pico ou absorbncia, a partir das quais sero calculadas as respectivas concentraes.

	A ordem, a quantidade e grafia dos compostos deve ser a mesma no objeto dados e no objeto padrao.

	A funo alerta quando a curva padro no tem um bom ajuste, com r2<0.7, mas roda a anlise.

	A funo alerta se h valores de leitura dos dados maiores que as leituras da curva padro.

Valor

	A funo Croma retorna uma lista com um composto em cada coluna, cada leitura de concentrao em uma linha e o nome do composto no cabealho.
	 

Autor(es):

    Anna Abraho    
    Estudante de Doutorado em Ecologia. Universidade Estadual de Campinas, Campinas, Brasil.


Exemplos:

 	#Matriz de dados com NAs
	matrix.na<-matrix(sample(c(rep(NA, 17), runif(483, 0, 100))), ncol=4)
	colnames(matrix.na)<-c("A", "B", "C", "D")
	dados<-matrix.na

	#Matriz de dados sem NAs
	matriz.picos<-matrix(runif(500, 0, 100), ncol=4)
	colnames(matriz.picos)<-c("A", "B", "C", "D")
	dados<-matriz.picos

	#Matriz de padres certinha
	con<-c(seq(from=0, to=10, by=2))
	matriz.padrao<-matrix(c(con, con*10, con*7, con*4, con*6), ncol=5)
	colnames(matriz.padrao)<-c("Concentracao", "A", "B", "C", "D")
	padrao<-matriz.padrao

	Croma(matriz.picos, matriz.padrao)
	Croma(matrix.na, matriz.padrao)

	#Matriz de padres esculhambada
	con<-c(seq(from=0, to=10, by=2))
	matriz.esc<-matrix(c(con, runif(24,0,100)), ncol=5)
	colnames(matriz.esc)<-c("Concentracao", "A", "B", "C", "D")
	padrao<-matriz.esc

	Croma(matriz.picos, matriz.esc)
	Croma(matrix.na, matriz.esc)
